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ABSTRACT: 


s module contains the NPARSE esete tables for processing the 
ser and DEFINE commands for V2 NCPs. 


ENVIRONMENT: VAX/VMS Operating System 
AUTHOR: Kathy Perko 
CREATION DATE: 13-November-1981 
MODIFIED BY: 
v03-001 MKP0001 Kathy Perko 7-Jan-1982 


Hopefully for the last time, change RTT (retransmit 
timer) from a circuit parameter to a Line parameter. 
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-SBTTL Declarations 
INCLUDE FILES: 


NMADEF ; Network Management La definiti 
NMLDEF : NML definit as Layer definitions 


i : OWN STORAGE: 


1 2 
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NALSV2STA SET PARAMETER S 4 00:57:40 VAX/VMS Macro V04-00 Pa 

v04- NMLSNPA_SETV2LINE Set V2 Line parameter -$Fb= 1386 3:38:30 NML.SRCINMLV2STA.MAR; 1 so a 
63 ~SBTTL NMLSNPA_SETV2LINE Set V2 Line parameter state table | ; 
92 ON Aa SE OC oe EL EE Reo | : 
3 ne : 
5 oF : eeeeeeooneoooosoeeoeeoeeeoeeeeseeseeosoeseosoeseoseeesoeesesseeeeooesesecoa : 
09 é3 IMSGS NMLSNPA_SETV2LINE | ; 
00 71 FIELDS : 
00 rg $SEOM §,NML_FUN_ERR : No SET ALL for v2 : 
00 3 SNEXT ; 
$8 75 FIELDS NML_SET_START : 
9000 0 SEOM ,NPAS_ERIT te ; 
Py ate Ps 
0000 78 $SBEXP NML_SET_STA,NML_SET_START ; 
9900 4 SNEXT : 
001C Hi FIELDS : Service : 
0000 Be SSBEXP NML_SET_SER,NML_SET_START,NMLSCHK_V2_CIRC : 
9000 i SNEXT 
$056 5 FIELDS : Counter timer : 
0000 86 $SBEXP NML_SET_LCT.NML_SET_START,NMLSCHK_V2_CIRC ; 
TE ee : 
003 89 FIELDS : Cost : 
0000 90 $SBEXP NML_SET_COS,NML_SET_START,NMLSCHK_V2_CIRC ; 
goog) Sve : 
004¢ 3 FIELDS : Controller : 
0006 94 $SBEXP NML_SET_CON,NML_SET_START.NMLSCHK_V2_LINE F 
bose, 98 NENT ; 
005C 97 FIELDS : Duplex ; 
0000 98 $SBEXP NML_SET_DUP,NML_SET_START,NMLSCHK_V2_LINE 3 
8300 gp Sent 7 
006C +4 FIELDS : Line type (V3 Protocol). : 
0000 «(1 : $SBEXP NML_SET_LTY.NML_SET_START,NMLSCHK_V2_LIN : 
go gy et 7 
007C 105 FIELDS : Service timer ; 
4 6 1 2 SSBEXP NML_SET_STI.NML_SET_START,NMLSCHK_V2_LINE : 
: ! SNEXT ; 
C 199 FIELDS 3: Normal timer (V3 Retransmit timer) : 
0 6 110 $SBEXP NML_SET_NTI,NML_SET_START,NMLSCHK_V2_CIRC : 
900 iW SNEXT 3 
09C 118 FIELDS ; Tributary address ; 
000 114 $SBEXP NML_SET_TRI,NML_SET_START,NMLSCHK_V2_CIRC : 
900 115 SNEXT : 
oh 113 FIELDS ; Receive buffer size : 
009 118 $SBEXP NML_SET_BFN.NML_SET_START,NMLSCHK_V2_LINE : 
0 119 $NEX7 ; 


NMLSV2STA 
v04 


SET PARAM 
NMLSNPA_ 


J 2 

R STATE TABLES FOR LINES 1973 er- 1388 00:32:50 abe Macro V04-00 
2LINE Set V2 Line parameter -SEP-1984 02:28:24 (CNML.SRCINMLV2STA.MAR; 1 
120 
: SAAT CH 2,NML_PTY_ERR U ized t t 

P ; Unrecognized parameter e 
] SNULL ,NML_FOR_ERR ; Format-error , oY. 
125 FIELDS NML_SET_STA ; State parameter 
1 § SWORD NMASC_PCCI_STA 
12? FIELDS 
1 3 SEOM »NML_FOR_ERR ; Format error 
129 $LOOK NMASC_STATE_ON,NML_SKIP_BYTE 3 On 
130 $LOOK NMASC“STATE-OFF,NMC_SKIP_BYTE =; Off 
131 SLOOK NMASC_STATE SER,NML_SKIP_BYTE ; Service 
! ¢ SNULL ,NML_PVA_ERR ; Parameter value error 
134 FIELDS NML_SET_SER ; Service parameter 
139 SWORD | NMASC_PCCI_SER,,,CPTSGK_PCCI_SER.NMLSGL_PRMCODE 
137 SEOM oNML_FOR_ERR ; Format error 
138 SLOOK NMASC_LINSV_ENA,NML_BYTE_SUB : Enabled 
139 $LOOK NMASC_LINSV_DIS,NML_BYTE_SUB : Disabled 
149 SNULL ,NML_PVA_ERR ; Parameter value error 
146 FIELDS NML_SET_LCT ; Counter timer 
\e7 SWORD NMASC_PCCI_LCT,NML_WORD_SUB, ,CPT$GK_PCCI_LCT,.NMLS$GL_PRMCODE 
145 FIELDS NML_SET_COS ; Cost 
196 SWORD NMASC_PTCI_COS,NML_BYTE_SUB, ,CPT$GX_PCC1_COS .NMLSGL_PRMCODE 
148 FIELDS NML_SET_CON : Controller mode parameter 
137 SVORD NMASC_PCLI_CON,,,CPTSGK_PCLI_CON,NMLSGL_PRMCODE 
151 SEOM »NML_FOR_ERR ; Format error 
136 S$LOOK NMAST_LIRCN_NOR,NML_BYTE_SUB : Normal 
153 $LOOK NMASC_LINCN_LOO,NML_BYTE_SUB ; Loopback 
133 SNULL ,NML_PVA_ERR ; Parameter value error 
138 FIELDS NML_SET_DUP ; Sueton arameter 
4 Fics be NMASC_PCLI_DUP,,,CPTSGK_PCL1_DUP,.NMLSGL_PRMCODE 
159 $SEOM oNML_FOR_ERR : Format error 
160 $LOOK NMASC_DPX_FUL. 4M! BYTE_SUB ; Full duplex 
161 $LOOK NMASC~DPX"HAL,NML~S8YTE_SUB 3 Half duplex 
196 SNULL ,NML_PVA_ERR ; Parameter value error 
164 FIELDS NML_SET_LTY 3; Line yin (V3 Protocol parameter) 
165 SWORD. NMASC_PCLI_PRO,,,CPTSGK_PCLI_PRO,NMLSGL_PRMCODE 
189 SEOM a. FOR_ERR : Format error 
168 $LOOK NMASC_LINPR_POI,.NML_BYTE_SUB 3; DDCMP Point 
192 $LOCK NMASC_LINPR_CON,NML_BYTE_SUB 3; DDCMP Controller 
170 $LOOK NMASC_LINPR_TRI,NML_BYTE_SUB ; DDCMP Tributary 
12) SNULL ,NML_PVA_ERR ; Parameter error 
138 FIELDS NML_SET_STI ; Service timer parameter 
174 RD NMASC_PCLI_STI,NML_WORD_SUB,,CPT$GK_PCLI_STI,.NMLSGL_PRMCODE 
176 FIELDS NML_SET_NTI ; Normal retransmit timer parameter 
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WORD NMASC_PCLI_RTT,NML_WORD_SUB, ,CPTSGK_PCLI_RTT,NMLSGL_PRMCODE 


ELDS NML_SET_T Tributary address 
ORD NMASC eDtch. _TRI,NML_BYTE _suB, .CPT$GK. PCCI_TRI, NMLSGL _PRMCODE 
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: Since the V2 receive buffer parameter = aoe and for v3 it got 
; changed to 1105, kludge the parameter id i 


FIELDS NML_SET_BFN ceive buffer 
SWORD NMASC PCL! _BFS,NML_WORD sus, .cPTécke PCLT BFS, ski? “PRMCODE 
F 


IELDS ; End of Line parameter states 
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NMLSNPA_CLEARV2LINE Clear V2 Line parame 5-SEP-1984 28:24 (CNML.SRCINMLV2STA.MAR; 1 (4) 
131 -SBTTL NMLSNPA_CLEARV2LINE Clear V2 Line parameter state table 
198 i+ 
194 ; Line 
198° 
° 199 IMSGS NMLSNPA_CLEARV2LINE 
Bho 199 FIELDS 
0 SEOM oNML_FUN_ERR 3; No CLEAR ALL for v2 
9 1 SNEXT 
7 7 FIELDS NML_CLEAR_START 
0000 04 SEOM »NPAS_EXIT ; Done 
0280 32 SNEXT 
03 0 $9 3; State 
0 80 208 SSBEXP NML_CLEAR_STA,NML_CLEAR_START 
Boer % SNEXT 
$5B¢ 11 FIELDS 3; Service 
0000 \¢ SSBEXP NML_CLEAR_SER,NML_CLEAR_START ,NMLSCHK_V2_CIRC 
49 SNEXT 
§53¢ 15 FIELDS ; Counter timer 
0000 16 SSBEXP NML_CLEAR_LCT,NML_CLEAR_START,NMLSCHK_V2_CIRC 
Boe 1? SNEXT 
bone 19 FIELDS 3; Cost 
0000 0 SSBEXP NML_CLEAR_COS,NML_CLEAR_START,NMLSCHK_V2_CIRC 
Roce 1 SNEXT 
at : FIELDS :; Controller 
0000 4 SSBEXP NML_CLEAR_CON,NML_CLEAR_START,NMLSCHK_V2_LINE 
$0) 53s Se 
02CcC 7 FIELDS 5 duplex 
0000 8 $SBEXP NML_CLEAR_DUP,NML_CLEAR_START,NMLSCHK_V2_LINE 
B9pe 4 SNEXT 
o2b¢ 1 FIELDS ;_Line Sype (V3 Protocol). 
0000 é SSBEXP NML_CLEAR_LTY,NML_CLEAR_START,NMLSCHK_V2_LINE 
st z SNEXT 
03 C 5 FIELDS 3; Service timer 
06 $ SSBEXP NML_CLEAR_STI,NML_CLEAR_START,NMLSCHK_Ve_LINE 
9900 $NEXT | 
te § FIELDS : Normal timer (V3 Retransmit timer) 
000 40 SSBEXP NML_CLEAR_NTI,NML_CLEAR_START,MMLSCHK_V2_CIRC | 
: ? $} SNEXT 
30C rk FIELDS ; Te touser address 
O98 44 $SBEXP NML_CLEAR_TRI,NML_CLEAR_START,NMLSCHK_V2_CIRC 
if a7 SNEXT 
1C¢ 23 FIELDS ; Receive buffer size 
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NMLSNPA_CLEARV2LINE Clear V2 Line parame 5-SEP-1984 02:28:24 (CNML.SRCINMLV2STA.MAR; 1 (4) 
i $SBEXP NML_CLEAR_BFN,NML_CLEAR_START ,NMLSCHK_V2_LINE 
FIELDS 
SMATCH 2,NML_PTY_ERR ; Unrecognized parameter type 
SNULL ,NML_FOR_ERR : Format error 
FIELDS NML_CLEAR_STA ; State parameter 
SWORD NMASC_PCCT_STA,NPAS_EXIT, NMLSCHK_V USTA 
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FIELDS NML_CLEAR_SER rvice perce 
SWORD NMASC_PCCI_SER,NPAS_EXIT, NMLSPRM’ * PEAR. ci 


FIELDS NML_CLEAR LCT Cou timer 
SWORD NMASC_PCCT_LCT,NPAS_EXIT, NMLSPRM’ CLEAR. « CPTSCK. PCCI_LCT 


FIELDS NML_CLEAR COS Cos 
SWORD NMASC_PCCT_COS,NPAS_EXIT, NMLSPRM’ * CLEAR, » .CPTSGK_ PCCI_COS 


FIELDS NML_CLEAR_CON Controller mode parameter 
SWORD NMASC_PCLT_ CON, NPA$_EXIT, NMLSPRM’ * CLEAR.» CPTSGK. PCLI_CON 


tcl aSER 


FIELDS NML_CLEAR_DUP ; Duplex parameter 
SWORD NMASC_PCLT_DUP,NPAS_EXIT, NMLSPRM_ saeree = uktine PCLI_DUP 


FIELDS NML_CLEAR_LTY e Type (v3 prepecet parameter) 
SWORD NMASC_PCLT_PRO,NPAS_EXIT, NMLSPRM’ ‘CLEAR, PPTSCR. PCLI_P 


FIELDS NML_CLEAR_STI Service timer parameter 
SWORD NMASC _PCLT_ STI,NPAS_EXIT, NMLSPRM’ * CLEAR, .-CPTSGK. CLI_STI 


FIELDS NML_CLEAR_NTI ormal retransmit timer parameter 
SWORD NMASC_PCLT_RTT,NPAS_EXIT, NMLSPRM* CLEARS, ,CPTSGR PCLI_RTT 


FIELDS NML_CLEAR_TR ributary address 
SWORD NMASC_PCCT_ TRI. NPAS_EXIT, NMLSPRM’ CLEARS C TSGK_PCCI_TRI 


FIELDS NML_CLEAR_BFN ceive buffer size 
SWORD NMASC_PCLT_BFS,NPAS_EXIT, NMLSPRM* CLEARS SCPTSGR. PeLI “ars 


FIELDS : End of Line parameter states 
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-SBTTL NMLSNPA_V2SUB Common set/define parameter parsing subexpressions 


oO 


3% 
; Common subexpressions 


IMSGS = =NMLSNPA_V2SUB 


| 
FIELDS wi BYTE SUB Single byte parameter 
SMATCH 1,NPA$_ERIT NMLSPRM.. CRECK 
SNULL ,NML_FORLERR  ; Format error 


FIELDS NML_WORD_ SUB Word He aa 
SMATCH 2,NPAS_ERIT NMLSPRM. CH 
SNULL ,NML_FOR_ERR  ; farast error 


FIELDS NML_LONG_ SUB Longword parameter 
SMATCH 4,NPAS_ERIT NMLSPRM. CHECK 
SNULL =, NML FOR_ ERR ; Format error 


FIELDS . SKIP_BYTE ey SY over single byte parameter 
$ NPAS_ERIT, NMLSCHK 

ate FOR R_ERR : Fevasy. ea 
subexpressions. 


NML_PTY_ERR ; Parameter type err 
NMLS_ srg" _PTY, ,NMLSPRM_ERR,, ,NMASC °STS. PTY 


NML_PNA_ERR Parameter not ap POTS PNAS error 
NMLS_STS “PNA, -NMLSPRM. ERR,, .NMASC_ 


NML_PVA_E Parameter value error 
NMLS_STS BUA, .NMLSPRM. ERR,, .NMASC_STS_PVA 


NML_FOR_ERR Message format error 
NMLS_STS_ INV, NMLSPRM. E R,» NMASC. STS_INV 


NML_FUN Message function error 
NMLS_ eee CFUN, .NMLSPRM: E R,.NMASC.. STS_INV 


; End of common parsing states 
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- END 
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Symbol table 724 UNMLC SRCINMLUZSTASMAR: 1 iad 
CPT$GK_PCCI_COS eeeeeeee =X NML_CLEAR_DUP 0003A0 R 
CPTSGK_PCCI-LCT eeeeeene = X NML>CLEAR_LCT $6 64 R 63 | 
CPT$GK~PCCI~SER eeeeeree x NML“CLEAR“LTY 0000384 R 03 | 
CPTS$GK_PCCI-TRI eeeeeeee =X p NML-CLEAR_NTI 0 bf R 0 
CPTSGK_PCLI_BFS eeeneeee =X NML-CLEAR_SER 0000350 R 03 
CPT$GK_PCLI_CON teeneene =X 0 NML-CLEAR_STA 900 40 2 03 
CPT$GK_PCLI_DuUP ereenere =X 03 NML-CLEAR_START 0 gi R 03 
CPTS$GK"PCLI-PRO eeeeeene Xx 03 NML-CLEAR_STI 00003C8 R 0 
CPTSGK_PCLI_RTT aeeeenee =X 03 NML-CLEAR-TRI 00003FO R 03 
it Samed frrerree °° mtsFOncER ao30cr8 #83 
NMASC_DPX_FUL = 0000000 NML-LONG. SUB agon04es e 03 
NMASC_DPX" HA = 00000001 NML-PNA_ERR 00 2 R 03 
NMASC_LINTN_L = 00000001 NML-PTY_ERR 00000478 R 03 
$C"LINCN_NOR = 00000000 NML-PVA_ERR 000004A0 R 03 
NMASC_LINPR_CON = 00000001 NML_SET_BFN 0000025C R 03 
NMASC_LINPR_POI = 00000000 NML_SET_CON Q000016C R B3 
NAASCHLINSV=DIS = 90000001 NAL~SET~DUP QOO0dIAS ROS 
NMASC_LINSV_ENA = 00000000 NML-SET_LCT 00009144 R 03 
NMASC-PCCI_CTOS = 00000384 NML_SET_LTY Q00001DC R 03 
$C“PCCI“LCT = 0000006E NML_SET_NTI 00000234 R 03 
NMASC_PCCI_SER = 00000064 NML_SET_SER OOQO010C R 03 
NMASC_PCCI-STA = 00000000 NML_SET_STA 000000D0 R 03 
NMASC_PCCI_TRI = 00000474 NML~SET_START 00000008 R 03 
NMASC_PCLI_BFS eeeeneeer = X 03 SET_STI 00000220 R 03 
NRSC PCLI-DUP = Oo00o4s? SELB BYTE 90000460 R 8 
NMASC_PCLI-PRO = 00000458 NML- WORD” SUB 00000430 R 03 
NMASC_PCLI-RTT = 00000461 NPASM_ACTION = 00000004 
NMASC_PCLI_STI = 00000460 NPASM_EXT = 00000001 
nage STATE = $eeente NPAgn-baa = Singeet® | 
NAASC= Te TRY = FrrFFPrE NPASH-OF FSET = 00000060 
NHASE~STS7PNA = FFFFFFEA NPASM_PARAM = 00000002 
$C“STS_PTY = FFFFFFFA NPASM_STATE = 00000008 
NMASC”STS_PVA = FFFFFFFO NPAS_ADVANCE = 00000001 
NMLSCAK_V2_CIRC teeeeeee XX 03 NPAS_BYTE 2 90000005 
NMLSCHK_V2_LINE teenenee =X 03 NPA$_EO ° 444 ; 
NMLSCHK_V2_STA eeeeeeee =X 03 NPA$_ERROR * 0000000 
NMLSGL_PRMTODE eeeerere =X 03 PAS_EXIT = 00000000 
NMLSNPA_CLEARV2L INE 00000270 RG 03 NPAS_EXTZV bd Q000000A 
NALSNPATVOSUBT Bo000418 RE OS NPASTIMAGE = 9000000 
a eeteeere XxX 03 NPA$_LOOK = 00000009 
eeeeeeee§ = X 03 NPA$_MASK = SO p SCE 
eerenees 03 NPAS_MATCH = 00000008 
= FFFFFFFE NPA$_NULL = 00000005 | 
S FEFETrDS Rag Won = 2000998 | 
= FEFFFFFG NXT$S$ = 00000000 
= FFFFFFEO 
0000418 R 03 
ee 
00003 § R 03 
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5. 3 
NMLSV2STA SET PARAMETER STATE TABLES FOR LINES tj Sat B49 00:37:30 AX/VMS Macro V04-00 Page 19 
Psect synopsis “-SEP=19 28:24 (CNML.SRCINMLV2STA.MAR; 1 (5) 


<x 

oc 

> 
@ 


ec eee rw es Some wom 


PSECT name Allocation PSECT No. Attributes 

+s 8 « 00000000 0.) 00 ¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 

. SLANK . 00000000 < 0.) O71 ¢ a NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE 

ABSS 49 9 ( 0.) 8s ( ¢°} NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 

NPASSTATE O0004DC ( 1244.) ( -) NOPIC USR CON REL LCL NOSHR NOEXE RD NOWRT NOVEC BYTE 
$ ome cane wana anon e reer ence $ 
H Performance indicators H 

Phase Page faults CPU Time Elapsed Time 

Initialization 36 00:00:00.06 00:00:01 .¢3 

Command processing 152 00:00:00.86 00:00:06.74 

Pass 1 470 OR 8 6a" ee 00:00:46.37 

Symbol table sort 0 00:00:01.58 BF 06 «28 

Pass 2 77 00:00:04.01 0:00:06.83 

Symbol table output 13 00:00:00.11 00:00:00.38 

Psect synopsis output 3 00:00:00.02 00:00:00.06 

Cross-reference output g bs 00:00:00.00 

Assembler run totals 75 00:00:30.56 00:01:04.60 


The working set_Limit was 1800 pages. . : 
120080 bytes (235 pages) of virtual memory were used to buffer the intermediate code. 
There were 60 payes of symbol table space allocated to hold 1083 non-local and 0 local symbols. 
335 source Lines were read in Pass 1, producing 23 object records in Pass 2. 
1 pages of virtual memory were used to define 28 macros. 


+ 
! Macro Library statistics ! 
pore ence eer mmm awaanaawaae + 


Macro Library name Macros defined 
-$255$DUA28: CSHRLIBINMALIBRY.MLB; 1 1 
_9255$DUA28: (SYS.0BJJLIB.MLB; 1 0 
_$255$DUA28: CNML .OBJ JNMLLIB.MLB; 1 14 
$255$DUA28: CSYSLIBISTARLET .MLB; 2 

TOTALS <all Libraries) 1 


1293 GETS were required to define 18 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:NMLV2STA/OBJ=OBJ$:NMLV2STA MSRC$:NMLV2STA/UPDATE=(ENHS:NMLV2STA) +LIB$:NMLLIB/LIB+EXECMLS/L1B+SHRLIBS:NMALIBRY/LIB 
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